(ns a-thousand-things-to-do.core)
(use '[clojure.java.io :only (reader)]) 
(use '[clojure-csv.core])

(defstruct album :year :title :artist)

(defn as-album-map [album-data]
   (struct-map :year (album-data 0)
               :title (album-data 1)
               :artist (album-data 2)))

(defn load-album-sequence [file-name]
   (binding [*delimiter* \;] 
	 (parse-csv (char-seq (reader file-name)))))
